Created on: 2025-07-15 13:09:04
Setup
Code
library(GeoPressureR)
library(ggplot2)
library(plotly)
library(terra)
library(tidyverse)
library(viridisLite)
library(sf)
library(rnaturalearth)
library(patchwork)
invisible(sapply(
list.files("/Users/rafnuss/Library/CloudStorage/OneDrive-Vogelwarte/GeoMag/R", pattern = "\\.R$", full.names = TRUE),
function(f) source(f, local = globalenv(), echo = FALSE)
))
id <- params$id
Code
tag <- tag_create(id, directory = params$directory, quiet=T )
Code
subplot(plot(tag, "pressure"), plot(tag, "twilight", plot_plotly = T), plot(tag, "actogram", plot_plotly = T), nrows = 3, shareX = TRUE, titleY = TRUE)